﻿<!--#include file="mymin.asp"-->
<title>查看友链</title></head><body><div class='main400'>
<%
dim id,classs,rs,sql
id=request.Querystring("id")
classs=request.Querystring("class")

set Rs=Server.CreateObject("ADODB.Recordset")
Sql="select * from 74hu_link Where ID="&ID
Rs.open Sql,myconn,1,3
If Not rs.eof	Then
	If rs("active")=0 Then
		active="正常"
	Else
		active="待审"
	End If
	w "网站名称: "&nowml(rs("NAME"))&"<br/>"&_
		"网站地址:"&nowml(rs("URL"))&"<br/>"&_
		"网站简介:"&nowml(rs("JIAN"))&"<br/>"&_
		"网站ID:"&ID&"<br/>"&_
		"回链:http://"&wapurl&"/link.asp?act=go&amp;id="&Rs("ID")&"<br/>"&_
		"最后点击:"&nowml(rs("HU_TIME"))&"<br/>"&_
		"链出:"&nowml(rs("HU_OUT"))&_
		"链入:"&nowml(rs("HU_IN"))&"<br/>"&_
		"=网站状态=<br/>"&_
		"状态:"&active&"<br/>"
Else
	w "该友链不存在<br/>"
End If%>
<a href="mymin_class.asp?sid=<%=sid%>&amp;id=<%=classs%>">[友链管理]</a><br/>
<a href="Link_class.asp?sid=<%=sid%>">[分类管理]</a><br/><a href='mymin_index.asp?sid=<%=sid%>'>[友链后台]</a>
<%call Last2%>